perm filename P[AM,DBL] blob sn#586897 filedate 1981-05-19 generic text, type T, neo UTF8
(FILECREATED "18-MAY-81 19:09:29" {DSK⎇P.;1 702    

     changes to:  PRINDEN PCOMS ng

     previous date: "18-MAY-81 16:34:00" {DSK⎇P.;1)


(PRETTYCOMPRINT PCOMS)

(RPAQQ PCOMS ((FNS PRINDEN)
	      (VARS ng)))
(DEFINEQ

(PRINDEN
  [LAMBDA (v f)                                             (* edited: "18-MAY-81 16:31")
    (DSPLEFTMARGIN (PROG1 (DSPLEFTMARGIN (IPLUS 10 (DSPLEFTMARGIN NIL f))
					 f)
			  (PRIN1 v f))
		   f])
)

(RPAQQ ng (SPACE TAB BitTitleAgenda BitTitleTask BitTitleCurHeur BitTitleCurUnit BitConcept 
		 BitConceptRegion Helv8 Helv8B BitTaskRegion BitHeuristicRegion BitHeuristic Helv9 
		 Helv9B BitTask BitAgenda BitAgendaRegion BAList LastUSnazzed))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (214 434 (PRINDEN 224 . 432)))))
STOP